﻿Public Class KhachHangCrt
    Private _maKH As Integer
    Private _tenKH As String
    Private _CMND As String
    Private _diaChi As String

    Private _chkTenKH As Boolean
    Private _chkCMND As Boolean
    Private _chkDiaChi As Boolean

    Public Property MaKh() As Integer
        Get
            Return _maKH
        End Get
        Set(ByVal value As Integer)
            _maKH = value
        End Set
    End Property

    Public Property TenKH() As String
        Get
            Return _tenKH
        End Get
        Set(ByVal value As String)
            _tenKH = value
        End Set
    End Property

    Public Property CMND() As String
        Get
            Return _CMND
        End Get
        Set(ByVal value As String)
            _CMND = value
        End Set
    End Property

    Public Property DiaChi() As String
        Get
            Return _diaChi
        End Get
        Set(ByVal value As String)
            _diaChi = value
        End Set
    End Property

    Public Property ChkTenKH() As Boolean
        Get
            Return _chkTenKH
        End Get
        Set(ByVal value As Boolean)
            _chkTenKH = value
        End Set
    End Property
    Public Property ChkCMND() As Boolean
        Get
            Return _chkCMND
        End Get
        Set(ByVal value As Boolean)
            _chkCMND = value
        End Set
    End Property

    Public Property ChkDiaChi() As Boolean
        Get
            Return _chkDiaChi
        End Get
        Set(ByVal value As Boolean)
            _chkDiaChi = value
        End Set
    End Property

    Public Sub New()
        _maKH = 0
        _tenKH = ""
        _CMND = ""
        _diaChi = ""
        _chkTenKH = False
        _chkCMND = False
        _chkDiaChi = False
    End Sub
End Class

